← Index
NYTProf Performance Profile   
For ../prof.pl
  Run on Thu Dec 15 15:23:56 2022
Reported on Thu Dec 15 15:27:04 2022

Filename(eval 384)[/Users/ether/.perlbrew/libs/36.0@std/lib/perl5/Class/Method/Modifiers.pm:148]
StatementsExecuted 12 statements in 33µs
Eval Invoked At/Users/ether/.perlbrew/libs/36.0@std/lib/perl5/Class/Method/Modifiers.pm line 148
Sibling evals1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18
Subroutines
Calls P F Exclusive
Time
Inclusive
Time
Subroutine
44130µs5.96msJSON::Schema::Modern::Document::OpenAPI::::hasJSON::Schema::Modern::Document::OpenAPI::has
Call graph for these subroutines as a Graphviz dot language file.
Line State
ments
Time
on line
Calls Time
in subs
Code
1package JSON::Schema::Modern::Document::OpenAPI;
2
# spent 5.96ms (30µs+5.93) within JSON::Schema::Modern::Document::OpenAPI::has which was called 4 times, avg 1.49ms/call: # once (9µs+1.71ms) by OpenAPI::Modern::BEGIN@28 at line 49 of JSON/Schema/Modern/Document/OpenAPI.pm # once (5µs+1.51ms) by OpenAPI::Modern::BEGIN@28 at line 70 of JSON/Schema/Modern/Document/OpenAPI.pm # once (8µs+1.47ms) by OpenAPI::Modern::BEGIN@28 at line 45 of JSON/Schema/Modern/Document/OpenAPI.pm # once (8µs+1.24ms) by OpenAPI::Modern::BEGIN@28 at line 57 of JSON/Schema/Modern/Document/OpenAPI.pm
sub has {
344µs for my $method (@$before) {
4410µs4119µs $method->(@_);
# spent 119µs making 4 calls to MooX::TypeTiny::__ANON__[MooX/TypeTiny.pm:25], avg 30µs/call
5 }
6419µs45.81ms $$wrapped->(@_);}
# spent 5.81ms making 4 calls to MooX::HandlesVia::has, avg 1.45ms/call
7;